This dataset is described on p. 4 of the textbook. You may load it from the dataset URL linked above or from the resampledata package.
library(tidyverse)
DATA <- read_csv("https://raw.githubusercontent.com/STAT-JET-ASU/Datasets/master/Chihara/Recidivism.csv")
glimpse(DATA)
Observations: 17,022
Variables: 8
$ Gender <chr> "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "M", "…
$ Age <chr> "Under 25", "55 and Older", "25-34", "55 and Older", "25-34",…
$ Age25 <chr> "Under 25", "Over 25", "Over 25", "Over 25", "Over 25", "Unde…
$ Race <chr> "White-NonHispanic", "White-NonHispanic", "White-NonHispanic"…
$ Offense <chr> "Felony", "Felony", "Felony", "Felony", "Felony", "Felony", "…
$ Recid <chr> "Yes", "Yes", "Yes", "Yes", "Yes", "Yes", "Yes", "Yes", "Yes"…
$ Type <chr> "Tech", "Tech", "Tech", "Tech", "Tech", "Tech", "New", "Tech"…
$ Days <dbl> 16, 19, 22, 25, 26, 27, 28, 41, 44, 46, 48, 49, 49, 51, 51, 5…
head(DATA)
# A tibble: 6 x 8
Gender Age Age25 Race Offense Recid Type Days
<chr> <chr> <chr> <chr> <chr> <chr> <chr> <dbl>
1 M Under 25 Under 25 White-NonHispanic Felony Yes Tech 16
2 M 55 and Older Over 25 White-NonHispanic Felony Yes Tech 19
3 M 25-34 Over 25 White-NonHispanic Felony Yes Tech 22
4 M 55 and Older Over 25 White-NonHispanic Felony Yes Tech 25
5 M 25-34 Over 25 Black-NonHispanic Felony Yes Tech 26
6 M Under 25 Under 25 White-NonHispanic Felony Yes Tech 27